﻿Public Class frmCustomerEntry
    Dim dbSystem As New dbSystem
    Dim dbGL As New dbGL
    Dim Var As New varDeclare
    Dim frmCtrl As New FormControl
    Dim curr2word As New Currency
    Dim dsBase As DataSet
    Dim dsGLAccount As DataSet
    Dim dsCurr As DataSet
    Dim TotalDebet As Decimal
    Dim TotalCredit As Decimal
    Dim CurrBase As String
    Public EntryID As String

    Private Sub frmCustomerEntry_Load(sender As Object, e As EventArgs) Handles MyBase.Load

    End Sub
End Class